home *** CD-ROM | disk | FTP | other *** search
- <HTML><HEAD>
- <TITLE>$${ApplicationName} - Search Form</TITLE>
- </HEAD><BODY bgcolor="ffffff">
-
- <FONT size="+1">$${ApplicationName}</FONT> <BR>
- <FONT size="+2"><B>Search Form</B></FONT>
-
- <!--- Search form --->
- <FORM action="$${SafeApplicationName}_Result.cfm" method="post">
-
- <TABLE>
- <WIZSET i = 0>
- <WIZLOOP index="CurrentField" list="$${SearchFields}">
- <WIZSET i = i + 1>
- <!---- field is in format 'sTable.sField=sType;nSize;bRequired' ---->
- <WIZSET Separator1Pos = Find( CurrentField, '.' )>
- <WIZSET Separator2Pos = Find( CurrentField, '=' )>
- <WIZSET Separator3Pos = Find( CurrentField, ';' )>
- <WIZSET TableFieldName = Left( CurrentField, Separator2Pos - 1 )>
- <WIZSET FieldName = Mid( CurrentField, Separator1Pos + 1, Separator2Pos - Separator1Pos - 1 )>
- <WIZSET FieldType = Mid( CurrentField, Separator2Pos + 1, Separator3Pos - Separator2Pos - 1 )>
-
- <!--- Field: $${CurrentField} --->
- <INPUT type="hidden" name="Crit$${i}_FieldName" value="$${TableFieldName}">
- <WIZIF FieldType EQ 'DATETIME'><INPUT type="hidden" name="Crit$${i}_Value_date">
- <WIZELSEIF FieldType EQ 'FLOAT'><INPUT type="hidden" name="Crit$${i}_Value_float">
- <WIZELSEIF FieldType EQ 'INT'><INPUT type="hidden" name="Crit$${i}_Value_integer">
- </WIZIF>
- <INPUT type="hidden" name="Crit$${i}_FieldType" value="$${FieldType}">
- <TR>
- <TD>$${FieldName}</TD>
- <TD><SELECT name="Crit$${i}_Operator">
- <WIZIF FieldType EQ 'BIT'>
- <OPTION value="EQUAL">is
- <WIZELSEIF FieldType EQ 'CHAR' OR FieldType EQ 'MEMO'>
- <OPTION value="CONTAINS">contains
- <OPTION value="BEGINS_WITH">begins with
- <OPTION value="ENDS_WITH">ends with
- <OPTION value="EQUAL">is
- <OPTION value="NOT_EQUAL">is not
- <OPTION value="SMALLER_THAN">before
- <OPTION value="GREATER_THAN">after
- <WIZELSEIF FieldType EQ 'INT' OR FieldType EQ 'FLOAT'>
- <OPTION value="EQUAL">is
- <OPTION value="NOT_EQUAL">is not
- <OPTION value="GREATER_THAN">greater than
- <OPTION value="SMALLER_THAN">smaller than
- <WIZELSEIF FieldType EQ 'DATETIME'>
- <OPTION value="GREATER_THAN">after
- <OPTION value="SMALLER_THAN">before
- </WIZIF>
- </SELECT>
- </TD>
- <TD>
- <WIZIF FieldType EQ 'BIT'>
- <INPUT type="radio" name="Crit$${i}_Value" value="1" checked> Yes
- <INPUT type="radio" name="Crit$${i}_Value" value="0"> No
- <WIZELSE>
- <INPUT type="text" name="Crit$${i}_Value">
- <WIZIF FieldType EQ 'DATETIME'>(i.e. 12/31/97)</WIZIF>
- </WIZIF>
- </TD>
- </TR>
-
- </WIZLOOP>
- </TABLE>
- <P>
- <INPUT type="submit">
-
- </FORM>
-
- </BODY></HTML>
-